/*abrir uma pagina da internet no formulario

insira um componente chamado CppWebBrowser no formulario(se encontra na aba Internet) e digite o código abaixo.*/

void __fastcall TForm1::ToolButton4Click(TObject *Sender)
{
CppWebBrowser1->Navigate(Variant("http://vmsdesenvolvimentos.we.bs/index.html" ));

}